home *** CD-ROM | disk | FTP | other *** search
-
- /*
- * This file was generated by the SOM Compiler.
- * Generated using:
- * SOM incremental update: 2.33
- */
-
- #ifdef SYMANTEC_CPLUS
- #undef PRAGMA_IMPORT_SUPPORTED
- #define PRAGMA_IMPORT_SUPPORTED 1
- #endif
-
- #define SOM_Module_scounter_Source
- #include "SCounter.xih"
-
- //==========================================================================
- SOM_Scope void SOMLINK
- COUNTIncrement(DevUniv_SCounter *somSelf, Environment *ev)
- {
- DebugStr((unsigned char const *)"Got to Increment!\n");
- DevUniv_SCounterData *somThis = DevUniv_SCounterGetData(somSelf);
- DevUniv_SCounterMethodDebug("DevUniv_SCounter","COUNTIncrement");
- somThis->value++;
- }
-
- //------------------------------------------------------------------------
- SOM_Scope void SOMLINK
- COUNTDecrement(DevUniv_SCounter *somSelf, Environment *ev)
- {
- DebugStr((unsigned char const *)"Got to Decrement!\n");
- DevUniv_SCounterData *somThis = DevUniv_SCounterGetData(somSelf);
- DevUniv_SCounterMethodDebug("DevUniv_SCounter","COUNTDecrement");
- somThis->value--;
- }
-
- //------------------------------------------------------------------------
- SOM_Scope void SOMLINK
- COUNTSquare(DevUniv_SCounter *somSelf, Environment *ev)
- {
- DebugStr((unsigned char const *)"Got to Square!\n");
- DevUniv_SCounterData *somThis = DevUniv_SCounterGetData(somSelf);
- DevUniv_SCounterMethodDebug("DevUniv_SCounter","COUNTSquare");
- somThis->value = somThis->value * somThis->value;
- }
-